############################################
# GHS 
# Date: MAY 19 2014
############################################

# install.packages("foreign")
# install.packages("xtable")
# install.packages("MASS")
# install.packages("systemfit")
# install.packages("locfit")  	# Used for local regression plots
# install.packages("gplots")
# install.packages("reporttools")
# install.packages("epicalc")
# install.packages("stargazer")
# install.packages("ggplot2")


rm(list=ls())
set.seed(1)
library(foreign)
# library(optmatch)
library(xtable)
#require(nnet)
library(MASS)
library(systemfit)
library(locfit)		# Used for local regression plots
library(gplots)
library(reporttools)
library(epicalc)
library(stargazer)
library(ggplot2)



setwd("....APSR Rep Small/R")


# Functions
source("code/functions_final_NEWBLOCKS.r")

# Prepare Variables and Create Subsetted Dataset
source("code/prepare_NEWBLOCKS.r")

# Implement Analyses
source("code/analysis_NEWBLOCKS.r")

# Print Out Tables for Review
source("code/print.all.tables.NEWBLOCKS.r")

